home *** CD-ROM | disk | FTP | other *** search
/ HaCKeRz Kr0nlcKLeZ 1 / HaCKeRz Kr0nlcKLeZ.iso / scriptz / wall.exe / WALL.TXT < prev   
Encoding:
Text File  |  1997-02-26  |  1.4 KB  |  55 lines
  1. Put These In your [ALIASES]
  2. /on {
  3.   %onick = 0 | %onicks = $opnick(0,#)
  4.   if (%onicks == 0) { echo 5 There are no People with 4,1OPS on # | halt }
  5.   if (%onicks > 0) { echo 1 -> OPS on # $+ :OPS: $+ # $+ : *1 }
  6.   :next
  7.   inc %onick 1
  8.   if (%onick > %onicks) { goto end }
  9.   :msg
  10.   raw -q notice $opnick(%onick,#) :OPS: *1
  11.   goto next
  12.   :end
  13.   halt
  14. }
  15. ;**************
  16. /vn  {
  17.   %vnick = 0 | %vnicks = $vnick(0,#)
  18.   if (%vnicks == 0) { echo 5 There are no People with 4,1VOICE on # | halt }
  19.   if (%vnicks > 0) { echo 1 -> Voices on # $+ :Voices: $+ # $+ : *1 }
  20.   :next
  21.   inc %vnick 1
  22.   if (%vnick > %vnicks) { goto end }
  23.   :msg
  24.   raw -q notice $vnick(%vnick,#) :VOICES: *1
  25.   goto next
  26.   :end
  27.   halt
  28. }
  29. /non {
  30.   %nonick = 0 | %nonicks = $nopnick(0,#)
  31.   if (%nonicks == 0) { echo 5 There are no People without 4,1OPS on # | halt }
  32.   if (%onicks > 0) { echo 1 -> NON-OPS on # $+ :NON-OPS: $+ # $+ : *1 }
  33.   :next
  34.   inc %nonick 1
  35.   if (%nonick > %nonicks) { goto end }
  36.   :msg
  37.   raw -q notice $nopnick(%nonick,#) :NON-OPS: *1
  38.   goto next
  39.   :end
  40.   halt
  41. }
  42. ;**************
  43.  
  44.  
  45. Now Put These In Your [POPUPS]
  46.  
  47. &Walls
  48. .MSG For Only &OPS:/on $?="What's Your Message??"
  49. .MSG For Only &Voices:/vn $?="What's Your Message??"
  50. .MSG For Only &NON-OPS:/non $?="What's Your Message??"
  51. .&Info On This ADDON:query <>Wall<>Addon<>By<>MaDdXnEsS<> | .play $mircdir $+ addon\info.mad
  52.  
  53. That's It 
  54. MaDdXnEsS!
  55. marilyn-manson@Nastything.com